home *** CD-ROM | disk | FTP | other *** search
/ SGI Developer Toolbox 6.1 / SGI Developer Toolbox 6.1 - Disc 4.iso / src / tutorials / geometer / Theorems / curves / cissoidofdiocles.T < prev    next >
Encoding:
Text File  |  1994-08-02  |  566 b   |  15 lines

  1. .geometry "version 0.1";
  2. v1 = .free(0.108696, -0.154891, .L0, "1");
  3. v2 = .free(0.252717, -0.0516304, .invisible, .L0, "2");
  4. c1 = .c.vv(v1, v2, .L0);
  5. v3 = .vonc(c1, 0.108696, -0.332106, .invisible, .L0, .cross);
  6. l1 = .l.vc(v3, c1, 1, .L0, .longline);
  7. l2 = .l.vlperp(v3, l1, .invisible, .L0, .longline);
  8. v4 = .v.lc(l2, c1, 2, .L0, .plus);
  9. v5 = .vonl(l1, 0.44837, -0.332106, .green, .L0, .cross);
  10. l3 = .l.vv(v4, v5, .L0, .longline);
  11. v7 = .v.lc(l3, c1, 2, .L0, .plus);
  12. len = .len.vv(v5, v7);
  13. cc = .c.vlen(v4, len, .invisible);
  14. v8 = .v.lc(l3, cc, 2, .smear, .L0, .plus);
  15.